home *** CD-ROM | disk | FTP | other *** search
/ MacFormat España 24 / MacFormat n. 24 (Spain) / MacFormat 24.bin / Demos / Jungle Activated! / JungleActivated Demo / jung DEMO d / 00176_Mixer- Kill Keyboard.ls < prev    next >
Encoding:
Text File  |  1996-10-14  |  665 b   |  23 lines
  1. on mouseUp
  2.   global gKeyboardScale, gKeyboardKill
  3.   puppetSprite(16, 1)
  4.   if gKeyboardKill = 0 then
  5.     set the volume of sound 3 to 0
  6.     set the volume of sound 13 to 0
  7.     set the volume of sound 14 to 0
  8.     set the volume of sound 15 to 0
  9.     set the foreColor of sprite 16 to 226
  10.     set gKeyboardKill to 1
  11.   else
  12.     if gKeyboardKill = 1 then
  13.       set the volume of sound 3 to gKeyboardScale
  14.       set the volume of sound 13 to gKeyboardScale
  15.       set the volume of sound 14 to gKeyboardScale
  16.       set the volume of sound 15 to gKeyboardScale
  17.       set the foreColor of sprite 16 to 255
  18.       set gKeyboardKill to 0
  19.     end if
  20.   end if
  21.   updateStage()
  22. end
  23.